home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 2 / BBS in a box - Trilogy II.iso / Files / Hyper / Q-R / ResGenie™ 1.0 / ResGenie™ / ResGenie™.rsrc / TEXT_198_finishone.txt < prev    next >
Encoding:
Text File  |  1993-08-02  |  295 b   |  8 lines
  1. global MovePathOne
  2. global MoveFileOne
  3. global Onedata
  4. global importfilew
  5. put empty into importfilew
  6. do sort Onedata
  7. if the number of lines of Onedata is one then put return & "     " after line 1 of onedata
  8. do Listoid   MoveFileOne  , Onedata, "one","Move it :","blue,white", "Chicago", "12", "0"